home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / ahmsyscm / _setup.1 / AHMSystem.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-11-12  |  3.0 KB  |  108 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'AHMSystem.pas' rev: 3.00
  6.  
  7. #ifndef AHMSystemHPP
  8. #define AHMSystemHPP
  9. #include <ShellAPI.hpp>
  10. #include <Dialogs.hpp>
  11. #include <Classes.hpp>
  12. #include <SysUtils.hpp>
  13. #include <Windows.hpp>
  14. #include <SysInit.hpp>
  15. #include <System.hpp>
  16.  
  17. //-- user supplied -----------------------------------------------------------
  18.  
  19. namespace Ahmsystem
  20. {
  21. //-- type declarations -------------------------------------------------------
  22. typedef SmallString<37>  TAHMAboutStr;
  23.  
  24. typedef SmallString<37>  TAHMExecSysStr;
  25.  
  26. typedef bool TROBoolean;
  27.  
  28. typedef System::AnsiString TROString;
  29.  
  30. typedef int TROInteger;
  31.  
  32. enum TAHMBeeptype { bNone, bDefault, bAsterix, bExclamation, bQuestion, bCriticalStop };
  33.  
  34. class DELPHICLASS TAHMSystemsComponent;
  35. class PASCALIMPLEMENTATION TAHMSystemsComponent : public Classes::TComponent 
  36. {
  37.     typedef Classes::TComponent inherited;
  38.     
  39. private:
  40.     TAHMAboutStr FAHMAboutStr;
  41.     
  42. public:
  43.     __fastcall virtual TAHMSystemsComponent(Classes::TComponent* AOwner);
  44.     
  45. __published:
  46.     __property TAHMAboutStr About = {read=FAHMAboutStr, write=FAHMAboutStr, stored=false};
  47. public:
  48.     /* TComponent.Destroy */ __fastcall virtual ~TAHMSystemsComponent(void) { }
  49.     
  50. };
  51.  
  52. class DELPHICLASS TAHMExecuteComponent;
  53. class PASCALIMPLEMENTATION TAHMExecuteComponent : public Ahmsystem::TAHMSystemsComponent 
  54. {
  55.     typedef Ahmsystem::TAHMSystemsComponent inherited;
  56.     
  57. private:
  58.     TAHMExecSysStr FAHMExecSysStr;
  59.     
  60. public:
  61.     virtual bool __fastcall Execute(void);
  62.     
  63. __published:
  64.     __property About ;
  65.     __property TAHMExecSysStr DesignExecute = {read=FAHMExecSysStr, write=FAHMExecSysStr, stored=false}
  66.         ;
  67. public:
  68.     /* TAHMSystemsComponent.Create */ __fastcall virtual TAHMExecuteComponent(Classes::TComponent* AOwner
  69.         ) : Ahmsystem::TAHMSystemsComponent(AOwner) { }
  70.     
  71. public:
  72.     /* TComponent.Destroy */ __fastcall virtual ~TAHMExecuteComponent(void) { }
  73.     
  74. };
  75.  
  76. class DELPHICLASS TAHMAdvancedExecComponent;
  77. class PASCALIMPLEMENTATION TAHMAdvancedExecComponent : public Ahmsystem::TAHMExecuteComponent 
  78. {
  79.     typedef Ahmsystem::TAHMExecuteComponent inherited;
  80.     
  81. private:
  82.     TAHMBeeptype FBeepType;
  83.     
  84. public:
  85.     virtual bool __fastcall Execute(void);
  86.     
  87. __published:
  88.     __property About ;
  89.     __property TAHMBeeptype Sound = {read=FBeepType, write=FBeepType, default=0};
  90. public:
  91.     /* TAHMSystemsComponent.Create */ __fastcall virtual TAHMAdvancedExecComponent(Classes::TComponent* 
  92.         AOwner) : Ahmsystem::TAHMExecuteComponent(AOwner) { }
  93.     
  94. public:
  95.     /* TComponent.Destroy */ __fastcall virtual ~TAHMAdvancedExecComponent(void) { }
  96.     
  97. };
  98.  
  99. //-- var, const, procedure ---------------------------------------------------
  100. extern PACKAGE void __fastcall BuildSystemDetails(void);
  101.  
  102. }    /* namespace Ahmsystem */
  103. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  104. using namespace Ahmsystem;
  105. #endif
  106. //-- end unit ----------------------------------------------------------------
  107. #endif    // AHMSystem
  108.